home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / diskmags / 0022-3.564 / dmg-0040 / m26501.txt < prev    next >
Text File  |  1997-04-16  |  14KB  |  364 lines

  1. INFO-ATARI16 Digest         Sun,  8 Oct 89       Volume 89 : Issue 501
  2.  
  3. Today's Topics:
  4.                                 ANSI C
  5.                Double Click Software's BBS Phone Number
  6.                HD disks & reading IBMPC disks (2 msgs)
  7.                   ST->IBM PC, Floppies OK w/TOS 1.4
  8.      ST SURVEY Update.....Soviet-bloc users wanted if existing...
  9.                                   VI
  10. ----------------------------------------------------------------------
  11.  
  12. Date: 8 Oct 89 15:26:46 GMT
  13. From: mcsun!hp4nl!nikhefh!t19@uunet.uu.net  (Geert J v Oldenborgh)
  14. Subject: ANSI C
  15.  
  16. Turbo C is pretty much ANSI.  Besides, it compiles faster and produces better
  17. code then any of the other C compilers, as far as I know.  I know a guy who
  18. sweated for a month to get his symbolic manipulation program 10% faster and
  19. then gained another 10-15% by switching from MWC to Turbo...
  20.  
  21. ------------------------------
  22.  
  23. Date: 8 Oct 89 06:32:05 GMT
  24. From: portal!cup.portal.com!Matthew_Eric_Seitz@uunet.uu.net
  25. Subject: Double Click Software's BBS Phone Number
  26.  
  27. Could somebody send me Double Click Software's BBS phone number?  Thanks.
  28.  
  29.                                         Matt
  30.  
  31. ------------------------------
  32.  
  33. Date: 8 Oct 89 05:44:23 GMT
  34. From: portal!cup.portal.com!Matthew_Eric_Seitz@uunet.uu.net
  35. Subject: HD disks & reading IBMPC disks
  36.  
  37. "But the IBM systems will not read disks formatted on the
  38. "ST unless you use a special formatting program.
  39. --
  40. Bill Silvert, Habitat Ecology Division.
  41.  
  42.         IBM systems will read double-sided diskettes formatted on an Atari
  43. ST using TOS 1.4, without any special formatting programs.
  44.  
  45.                                 Matt Seitz
  46.  
  47. ------------------------------
  48.  
  49. Date: 8 Oct 89 07:47:08 GMT
  50. From: eru!luth!sunic!mcsun!unido!tub!tmpmbx!netmbx!hase@bloom-beacon.mit.edu
  51.  (Hartmut Semken)
  52. Subject: HD disks & reading IBMPC disks
  53.  
  54. In article <PINKAS.89Oct6115615@cadev2.intel.com> pinkas@cadev2.intel.com
  55.  (Israel Pinkas ?) writes:
  56. >1) Is there any way to get a 1040ST (TOS 1.4) to use HD (1.4M) disks?  I
  57. >   tried to format one and the machine refused.  (Gave the same error as
  58. >   when you try to format a write-protected disk.
  59.  
  60. Yes. It is possible; it requires hacking the hardware:
  61.  
  62. 1.4 Megabyte drives use 300 rounds per minute rotation speed and a 500
  63. kBit per second data rate; twice the data rate/density as the regular
  64. drives do.
  65.  
  66. If You get a HD drive (TEAC FD135 HFN for example) and wire it up to the
  67. ST, it will work just as a 720 k-drive, cause the controller chip is
  68. still fixed to 250 kBit per second.
  69.  
  70. We have to speed up the controller; looks easy: the controller manual
  71. says all time constants of the controller are take from its 8 MHz clock.
  72. If we would just switch it to 16 MHz?
  73.  
  74. That is, what I have done to my ST. I use the 16 MHz output of the
  75. SHIFTER as clock source and switch the controller clock between 16 and 8
  76. MHz based on the High-Denity-Enable output of my TEAC FD 135HFN (Shugard
  77. BUS pin 2).
  78.  
  79. It works fine, if the step-rate (the time between 2 consecutive Step
  80. pulses sent to the drive) is set to 6 milliseconds. The controller will
  81. now step every 3 milliseconds (since we doubled the his clock) in HD
  82. mode, and every 6 milliseconds in DD mode; this does not hurt the drive
  83. or performance too much.
  84.  
  85. I have some problems with it: no program will load from HD disks and
  86. access to folders does not seem to work too well from DESKTOP.
  87. Everything works fine from msh, as far as I can tell. Even copying files
  88. from HD to DD disks (DD disk in drive B; not tested for single drive
  89. copy) works fine.
  90.  
  91. All we still need is the software to set the step rate to 6 milliseconds
  92. and to format a drive with 18 Sectors per track.
  93.  
  94. Here ist goes:
  95.  
  96. seek6.s: set seek rate for all (both) drives to 6 milliseconds
  97. /       module name seek6
  98.  
  99.         .shri
  100.  
  101.         .globl main_
  102. main_:
  103.         clr.l   -(sp)
  104.         move.w  $0x20,-(sp)
  105.         trap    $1
  106.         addq.l  $6,a7
  107.         move.l  d0,_save_ssp
  108.         move.w  $0,0x440 / 0 => 6 ms, 1 => 12 ms, 2 => 2 ms, 3 => 3 ms
  109.         lea     0x46a,a0
  110.         move.l  (a0),d0
  111.         movea.l d0,a0
  112.         jsr     (a0)
  113.         move.l  _save_ssp,-(sp)
  114.         move.w  $0x20,-(sp)
  115.         trap    $1
  116.         addq.l  $6,a7
  117.         .even
  118. _save_ssp:
  119.         .blkl   1
  120. -----------------------
  121. formath.c: format high density disk
  122. /* formath.c Formatter fuer High Density Disketten */
  123. /* nur fuer angepasste Hardware! Floppycontroller und Laufwerk */
  124. /* muessen High-Density tauglich sein! */
  125. /* Hartmut Semken, Lupsteiner Weg 67 1000 Berlin 37 */
  126. /* hase@netmbx.UUCP */
  127. /* 03-SEP-89 */
  128. /*formath.c: format High Density disks on modified ST (controller clock
  129. switcheble to 16 MHz) using HD disks and drive.
  130. Quickly hacked in from example given in Mark Williams C documentation */
  131.  
  132. #include <stdio.h>
  133. #include <osbind.h>
  134. #include <time.h>
  135.  
  136. #define SLEEPTIME 1     /* 1: Zeitschleife, 0: Taste */
  137. #define BLANK (0xE5E5)
  138. #define MAGIC (0x87654321L)
  139. #define BUFSIZE (20*1024) /* Platz fuer mehr als 18 Sektoren... */
  140.  
  141. #define DEVICE 0        /* 0 = Floppy A, 1 = Floppy B   */
  142. #define SIDES 2         /* je                           */
  143. #define SECTORS 18      /* nach                         */
  144. #define TRACKS 80       /*Belieben                      */
  145.  
  146. #define TOTSEC (TRACKS * SIDES * SECTORS)
  147.  
  148. extern int errno;
  149.  
  150. main()?
  151.         int track;
  152.         int side;
  153.         int status;
  154.         short *bf;
  155.         register char reply;
  156.         short *middle;
  157.         char buffer[512];
  158.  
  159.         printf("\033E\n");
  160.         printf("Public Domain High Density Mini Formatter\n");
  161.         printf("von H. Semken\nDer Autor garantiert in keiner Weise fr die
  162.  Funktion\nDieses Programmes.\nBenutzung auf eigene Gefahr.\n");
  163.         printf("\n\n\n");
  164.         printf("\007\033pFormatiere Diskette in Drive %c\033q\n%d Seiten\n%d Sektoren
  165.  pro Spur\n%d Spuren\n\n", (65+DEVICE), SIDES, SECTORS, TRACKS);
  166.         printf("Wirklich formatieren? ");
  167.         fflush(stdout);
  168.         if ((reply = Crawcin()) != 'y' && reply != 'Y' && reply != 'j' && reply != 'J')
  169.  ?
  170.                 printf("Nein. Floppy nicht formatiert.\n");
  171.                 sleep(1);
  172.                 Pterm0();
  173.         ?
  174.         printf("Ja.\n");
  175.         printf("Diskette einlegen; Taste drcken...");
  176.         fflush(stdout);
  177.         Crawcin();
  178.         printf("\n");
  179.         bf = malloc(BUFSIZE);
  180.         for (track = TRACKS-1; track >= 0; track--) ?
  181.                 for (side = 0; side < SIDES; side++) ?
  182.                         printf("Formatiere Spur %d, Seite %d", track, side);
  183.                         fflush(stdout);
  184.                         status = Flopfmt(bf, 0L, DEVICE, SECTORS, track, side, 1, MAGIC, BLANK);
  185.                         if (status) ?
  186.                                 middle = bf;
  187.                                 printf("\t%d\n", status);
  188.                                 while (*middle) ?
  189.                                         printf("\tDefekter Sektor %d\n", *middle++);
  190.                                 ?
  191.                         ? else ?
  192.                                 printf("\tokay\r");
  193.                         ?
  194.                 ?
  195.         ?
  196.         printf("\n\nAlle Spuren formatiert\n");
  197.         printf("Initialisiere Directory\n");
  198.         for (track = 0; track < (BUFSIZE>>1); bf[track++] = 0);
  199.         for (track = 0; track < 2;track++) ?
  200.                 for (side = 0; side < SIDES; side++)?
  201.                 if (status = Flopwr(bf, 0L, DEVICE, 1, track, side, SECTORS)) ?
  202.                         errno = -status;
  203.                         perror("Write Error");
  204.                 ?
  205.                 ?
  206.         ?
  207.         Protobt(buffer, (long)Random(),3,0); /* Prototyp Bootsector fr
  208.                                               * 80 * 2 * 9 Sektoren */
  209.         /* Prototyp Bootsektor fr das neue Format anpassen */
  210.         /* Bytes 19 und 20 enthalten die Sektoren pro Disk */
  211.  
  212.         /* unteres Byte von TOTSEC */
  213.         buffer[19] = (char)(((TOTSEC>>8)<<8)~TOTSEC);
  214.         /* oberes Byte von TOTSEC; es lebe das Intel int-Format */
  215.         buffer[20] = (char)(TOTSEC>>8);
  216.         buffer[24] = (char)SECTORS; /* Sektoren pro Spur */
  217.         status = Flopwr(buffer, 0L, DEVICE, 1, 0, 0, 1);
  218.         if (status) ?
  219.                 errno = -status;
  220.                 perror("Write Error (Bootsector)");
  221.         ?
  222.         status = Flopver(buffer, 0L, DEVICE, 1, 0, 0, 1);
  223.         if (status) ?
  224.                 errno = -status;
  225.                 perror("Verify Error (Bootsector)");
  226.         ?
  227.         printf("Diskette in Laufwerk %c formatiert\n", (65+DEVICE));
  228.         sleep(1);
  229.         Pterm0();
  230. ?
  231.  
  232. sleep(seconds)
  233. int seconds;
  234. #if SLEEPTIME
  235. ?
  236.         clock_t t;
  237.         for(t = clock();clock() < (t + CLK_TCK*seconds););
  238. ?
  239. #else
  240. ?
  241.         printf("Taste druecken\n");
  242.         fflush(stdout);
  243.         Crawcin();
  244. ?
  245. #endif
  246. /* end of formath.c */
  247.  
  248. --
  249. Hartmut Semken, Lupsteiner Weg 67, 1000 Berlin 37 hase@netmbx.UUCP
  250. Dennis had stepped up into the top seat whet its founder had died of a
  251. lethal overdose of brick wall, taken while under the influence of a
  252. Ferrari and a bottle of tequila. (Douglas Adams; the long dark teatime...)
  253.  
  254. ------------------------------
  255.  
  256. Date: 8 Oct 89 07:53:38 GMT
  257. From: eru!luth!sunic!mcsun!unido!tub!tmpmbx!netmbx!hase@bloom-beacon.mit.edu
  258.  (Hartmut Semken)
  259. Subject: ST->IBM PC, Floppies OK w/TOS 1.4
  260.  
  261. In article <18093@pasteur.Berkeley.EDU> soohoo@cory.Berkeley.EDU (Ken "nmi"
  262.  Soohoo) writes:
  263. >Just curious, since I'm transferring Atari ASCII files to an IBM,
  264. >and they come out just fine, how much of EBCIDIC (sp?) maps to
  265. >ASCII (I assume a PC uses EDCIDIC, no?)
  266.  
  267. No.
  268. Even Mama Blue is (sometimes) willing to adopt to standards, even when
  269. trying to set them. First, they used ASCII for the PC, now the gor for
  270. UN*X (AX for PS/2, RIOS and VM370 will come "real soon now"! They are
  271. still tying to make the 286 act like a microprocessor...)
  272.  
  273. The Pissi uses some sort of extended ASCII. The ST extends this table
  274. further.
  275.  
  276.  
  277. hase
  278. --
  279. Hartmut Semken, Lupsteiner Weg 67, 1000 Berlin 37 hase@netmbx.UUCP
  280. Dennis had stepped up into the top seat whet its founder had died of a
  281. lethal overdose of brick wall, taken while under the influence of a
  282. Ferrari and a bottle of tequila. (Douglas Adams; the long dark teatime...)
  283.  
  284. ------------------------------
  285.  
  286. Date: 8 Oct 89 03:15:22 GMT
  287. From: cadre.dsl.pitt.edu!pitt!cuphub!kar7481@pt.cs.cmu.edu  (Dan
  288.  Karbowsky;AtariEliteOfPghPa bbs412-384-5609)
  289. Subject: ST SURVEY Update.....Soviet-bloc users wanted if existing...
  290.  
  291. Well,
  292.  
  293.         2 weeks have gone by since the ORIGINAL request for information
  294. regarding ATARI prices/products has gone out.
  295.  
  296.         Since then, replies have been received from:
  297.  
  298.         USA:  Arkansas Univ.
  299.               Columbia Business School, NYC
  300.               Cupertino, CA
  301.               Michigan
  302.                 and a few other states.....
  303.  
  304.         EUROPE:
  305.                 Norway
  306.                 Sweden
  307.                 France
  308.                 England
  309.                 Switzerland
  310.                 The Netherlands
  311.                   and a few others that escape me now (3:05am)...
  312.  
  313.         I would * R E A L L Y * like to hear from some ST owners/users
  314. in Soviet-bloc countries if there exist any!!!
  315.  
  316.         In the meantime, I STILL WANT TO HEAR FROM SOME MORE ST USERS!!!
  317.  
  318.      ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  319.  
  320.    Also, if ANYONE has ANY information on ANYONE ELSE who programs
  321.  in the S.T.O.S. programming language for the ST, please send me E*mail!!!
  322.  
  323.     =======================================================================
  324.  
  325.  Ever notice how EVERYONE seems to enjoy using multiple exclamation points :-?
  326.  
  327.  +---------------------------------------------------------------------------+
  328.  | Dan Karbowsky      kar7481@pitt!cuphub  /             //===============/  |
  329.  | 102 Lee Drive      ____________________/    /  /     //         //        |
  330.  | Belle Vernon, PA  / _____________________ _/_ /_ __ //====//   //         |
  331.  | 15012   U.S.A.   / /__    __ __ __ _ /    /  / //_/      //   //  !!!!!   |
  332.  |_________________/ ___//_//_//_//_// /    /_ / //_  -====//   //           |
  333.  |                         /  /                                              |
  334.  |     Call the ATARI ELITE of PITTSBURGH'S BBS (Forem-ST,fnet node 19)      |
  335.  |     at (412) 384-5609 at 300 thru 19.2k baud 24 hrs./day 7-days/week      |
  336.  |     and see why we are the ATARI ELITE!!! Mention this message at logon.  |
  337.  |*note: UUCP site used is located at California U. of PA,California,PA.     |
  338.  +---------------------------------------------------------------------------+
  339.  
  340. ------------------------------
  341.  
  342. Date: 7 Oct 89 22:11:02 GMT
  343. From: att!cbnewsd!orc@ucbvax.Berkeley.EDU  (david parsons)
  344. Subject: VI
  345.  
  346. On 6 Oct 89 14:23:11 GMT, krieg@jupiter.uucp (Andrew Krieg) wrote:
  347. >I would love to use vi at home.  Is their a public domain version for the ST
  348. >floating around anywhere?
  349.  
  350.   Yes, there are at least two:
  351.  
  352.   1) Levee, written by me; it's available on Bix for certain; it may be in
  353.      some of the archives.
  354.   2) Stevi (or some similar name), written by Tony Andrews (?); also available
  355.      on Bix; I *know it's available on some of the archives, because there
  356.      was discussion of it a while back.
  357.  
  358.  -david parsons
  359.  
  360. ------------------------------
  361.  
  362. End of INFO-ATARI16 Digest V89 Issue #501
  363. *****************************************
  364.